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1«0 ABSTRACT 



DXDL8 IS AN lOMOD THAT EXERCISES OHK OLll-«E AS YHCHRQJiQOS 
CQMMUHICATIOMS fiTEHFACS C^l800>« THE PROGRAM CONSISTS OF TWO 
l^iAJOR SFCTiOr^S AS DESCRI8FD BELOyt 

SECTIOM OWES 

THE FIRST SSCTIO?« CONSISTS OF A LOGICALLY SEQUEMCRD 
SFT OF STATIC RFGISTER TESTS TO fFRIFY THE DLll-E HARDCORE 
RSQOIPgO TO PERFORM IMPCIT/OgfPUT DATA TRANSFERS IH tiTERRHPT 
NODE. ERRORS DETECTED in THIS SSCTlOi THAT ARE DETERMINED TO 
BP FATAL ARB REPORTED ¥IA THE STANDARD DEC/Xll ERROR Pi^I^TOOT 
km THEM THE f^OOOLE IS DROPPED FROM THE EXERCISE* HOM-^FATAL 
ERRORS ARE SIMPLY REPORTgn AMD THEII THE PROGRAM COMTIiOES III FOR- 
MAL SEQUEMCE. 

SECTION TWOl 



THE SFCOI^O SECTIOM TRAflSfFRS 256« BYTE BLQCirS OF DATA 
USIMG TRS ^AINfTSMAMCE MODE TO tmu THE DATA AROHUD* THE 256» 
BYTES OUTPUT ARE COMPARED lilTH THE 256« BYTES I?fPUT FOR DATA 
COHPAf?ISOM ERRORS* ALL DATA COHPARISOM ERRORS ARE REPORTED 
ON THE CONSOLE DEVICE* THE 256« BYTE TRAMSFER IS REPEATED 
FOR FOUR DIFFERENT DATA 3TT PATTERI^S AS DESCRIBED BELOMI 

k. ?^ULL-DEL-MULL SEQUENCE ( 000|.377«.000. . « rOOO^.377) 

8« BINARY UP-COUMT SEQUENCE lOQO^ OQl^ QQ2. ^ ^ ^316^311} 

C« Rlt^ARY DQMW COUNT SSQUEfiCE (377^376^375* « ««*^001^000) 

D, WORST CASE PITTERf^ ( 376^ 377^ 001|. 000« 000^ 200) 



2.0 REQUIRE?»^E^TS 



HIRDWAREt A PDPll COMPUTER HITH A DL11--E IHTERFACS 

STO??AGEtl DLB RSQUIRESs 

1* DECIMAL WORDSl 1354 
2« OCTAL WORDS: 02512 
3« OCTAL BYTES! 5224 

3«0 PASS DEFIMITIOri 



O^E PASS OF "DXDLBB'^ CQMSISTS OF TiO ITFRATIOHS OF SECTIOM 
TWO OF THE MODULE CODE WHICH RESULTS IH 2048(10) BYTES 
TRAMSFERRED* 



4«0 EXECUTION TINE 



AT 300 BAUD RONI^IMG ALOME Off A PDPll/40 A SIMGLE ERROR FREE 
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PASS TkKES APPROXIMATEL? 40, SECONDS THIS TIME WILL VftR¥ 
OEPENDING UPQH THE BAUD RATS AND CPO TYPE« 

5«0 CO^FIGURATIIM PA8ANETERS 

DEFAULT PARAHETERSS 

DVA: 175610 ¥CTS 300 BRlS 4 BR2? 

D^C? 1 SRI? 

REQUIRED PARAMETERS? 

SRI TO EXERCISE THOSE STATIC TESTS REQOIRIMG THE USE 

OF THE H315 MODEM TEST CONMECTOR fMOOEM COMTROL LOGIC) 
BIT 15 OF SRI miSf ^E SET TO A ««1^« IE SR1=100000« 

NOTE; IF SRl BIT 15=1 AMD THE MODEM TEST CONNECTOR 
IS nor INSTALLED^ FALSE ERRORS MILL BE REPORTED- 

6«0 OEVrCF/nPTIOM SFTffP 



IF THE MODEM COWROL LOGIC IS TO BE TESTED^ THE USER MUST 
DTSCOMI^ECT THE MODEM knU COMNBCT THE H315 TEST CONNECTOR TO 
THE DLll-E DEVICE CABLE. SRl MUST BE SETUP AS DESCRIBED IM 
(5»0) OR THE TESTS WILL BE SKIPPED. 

1.0 MODULE OPFRATIOM 

7.1 TEST SEQUENCES 



A. STATIC REGISTER TESTS 

DLTOl? TEST THAT ALL BITS IM THE RCSR ARE CLEAR MHEN 
THE MODULE IS INITIALIZED TO RUN. 

DLT02S TEST THAT ONLY THE »»RFADY" WIT IS SET 

IN THE XCSR MHEN THE MODULE IS INITIALIZED TO RUN« 

OLT031 TEST THAT THE «''MAINT" BIT IN THE XCSR CAN BE 
SET AND CLEARED. 

DLT04S TEST THAT THE *'INTR ENAB«« BIT IN THE XCSR CAN 
CAUSE AN INTERRUPT TO THE PROPER VECTOR iHEN 
SET AND ALSO THAT «»INTR ENAB«« CLEARS PROPERLY. 

DLTOSf TEST THAI A RECEIVER INTERRUPT OCCURS TO THE 
PROPER VECTOR UHEH "^DONE«' GETS SET WITH THE 
"INTR ENAB" BIT IN THE RCSR SET TO A ONE. 
ALSO TEST THAT THE CORRECT DATA IS RECEIVED^ 

TESTS DLT06 THRU DLT13 ASSUME THAT THE H315 MODEM 



DLTlOt 
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IpST COMMSCTOR IS ip?ALLSD« THS USER IffDICIfES 
THIS Bf SETTING BIT15 iPf SRl« TRS MODDLE LOOO kf 
SRI AMD ilLL SKIP AROOMD DLT06 THRU DLT13 IF BIT15=0« 

DLT06I TEST THAT ««REQ TO SEHO** CAM ASSERT »«RIIIG^ 

MHfiH SET AMD THAT BOTH ''REQ TO SEMD" AiD '^RTMG*^ 
CkU SB CLEARED PROPERLY* 

DLT07? TEST THIT *«SEC mit^ mEU SET ASSERTS 

^*SEC RSC** MIflCH SETS «^OITI SET IMT*« AlfO THAT 
RFADIHG THE RKSR CLEARS *«DATA SET IMT««« 
ALSO TESTS THAT CLEARING »^SEC XMIT^« LEGATES 
^SEC REC^ MmCB ALSO CAUSES '^DATA SET I1^T"« TO 
SET« 

TEST THAT *«DTR«» ASSERTS ««CLR TO SEMO« AUD 
^'^CAR DET'^ WHICH III TURW SET *'DATA SET IHT'^* 
ALSO TESTS THAT "CLR TO SEMD"' liO *^CAR D£f»^ 
CLEIR MHEn ''dfR^ IS CLEARED* 

DLT112 TEST THAT ''DATA SET IMTR Ef^ABLE^ CAi BE SET 
AMD CLEARED* 

DLT12S TEST THAT "DATA SET IMTR EMABLE** lU THE XCSR 
CAUSES A^ IMTR« iREM ENABLED* 

0LT131 TEST THAT THE BREAK BIT IM THE XCSR CAH BE SET 
AMD CLEARED. 

NOTES BASIC TESTS OLTOl THRU DLT13 SRE EXECUTED 
OMLY ONCE mEM THE MODULE IS FIRST INITIALIZED* 
IE AMY FATAL ERRORS^ARE DETECTED THE MODULE IS DROPPED 
PRIOR TO THE DATA TRANSFER TESTS* AFTER PASS 1 THE 
NfODULE IS RESTARTED AT THE EMTRY POTMT TO THE DATA 
TRAMSFfiR TESTS* 

3« DATA TRANSFER TESTS 

AFTER THE BASIC TESTS ARE RUM# FOUR 256{10) 
BYTE DATA TRANSFERS ARB EXECUTED IM THE MAIOTEMAMCE 
MODE* EACH 256C10) BYTE BLOCK TRANSFER IS DTFFERREWT 
in THAT FOUR DIFFERENT DATA PATTERNS ARE 5Cf*IITTED AMD 
RECEIYED AS DESCRIBED IN PARA« 1«0» 

THE TEST SEQUESCS FOR THE D&TA TRANSFER TESTS IS AS 
FOLLOWS I 

1^) CLEAR BOTH THE IMf^UT AMD OUTPUT BUFFERS IM CORE 
(256C10) BYTES EACH). 

2. ) LOAD THE OUTPUT BUFFER «TH THE APPROPRIATE DATA 
PATTERN. 

3. ) SUABLE BOTH THE XMIT AMD RCfR WTBRRUPTS AMD 
INITIATE THE DATA TRAf^SFERS* 
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4«) AFTER 256(10) BYTES HAYE BEEi OUTPUT AMD IMPUT 

COMPARE THE OUTPUT AND INPUT BUFFERS^. BYTE BY BYTE 
FOR DATA COMPARE ERRORS* REPORT ALL DATA ERRORS 
OM THE CONSOLE DEVICE* 

5«) IF ALL FOUR DATA PATTERffS HAYE BEEN TRAMSFERRBDi. 
GO TO (6) BELOi - IF NOT REPEAT CD THRU (4) FOR 
THE NEXT PATTERN. 

6«) DECREMENT A PASS COUNTER flNITI ALI AZED TO 2« ) 
AND TEST FOR ZERO, IF ZERO GO TO (7) « IF NOT 
REPEAT CI) THRU (5) AGAIN* 

7.) REPORT END OF PASS TO THE MONITOR AND RESTART 
AT CI) WITH THE FIRST DATA PATTERN. 

NOTES? 

CI) ON BACH *»XNIT»« INTERRUPT THE ^^READY** FLAG IS TESTED 
AND IF NOT SET^ THE ERROR IS REPORTED AND THE MODULE 
IS DROPPED. CFALSE INTERRUPTS ARE CLASSIFIED AS 
FATAL ERRORS)* 

C2) ON EACH ^'RCVR** INTERRUPT THE ^OONE»« FLAG IS TESTED 
AND IF NOT SET THE MODULE IS DROPPED THE SAME AS 
FOR A "XNIT FALSE INTERRUPT*** 

(3) IF A SOFT ERROR C PARITY-FRAMING-OYERRUN) IS DET- 
ECTED IN RCYR INTR« SERYICE# THE OFFENDING BLOCK 
TRANSFER IS RESTARTED FROIf THE BEGINNING OF TBE 
BLOCK, IF AFTER THREE RETRIES THE ERROR PERSISTS^ 
TRANS^^-ER OF THE OFFENDING DATA PATTERN IS ABORTED 
AND THE PROGRAM GOES ON TO THE NEXT DATA PATTERN. 
ALL SOFT ERRORS ARE REPORTED ON THE CONSOLE DEYTCE« 



7»2 SUBROUTINE ABSTRACTS 

SEGXS THIS SUBROUTINE SERVES AS A MINI-WNOTQR THAT CONTROLS 
THE SEQUENCING OF THE FOUR DIFFERENT 256C10) BYTE 
BLOCK TRANSFERS. IT IS CALLED AFTER THE BASIC TESTS 
AND PERFORMS THE FOLLOiING FUNCTlONSs 

U CALLS A SUBROUTINE TO CLEAR THE DATA BUFFERS 

2. CALLS THE APPROPRIATE SUBROUTINE TO SET UP THE 
OUTPUT BUFFER IsflTH THE REQUIRED DATA PATTERN, 

3. CALLS A SUBROUTINE TO ENABLE INTERRUPTS AND INITIATE 
THE DATA TRANSFER. 

4. SERVICES RETRIES REQUESTED BY SOFT ERRORS. 

5. PERFORMS "BREAr^ CALLS TO THE MONITOR TO PREVENT 
TIMEOUTS FROM HANGING THE NODULE. 

6. CALLS THE SUBROUTINE TO CHEC^ THE DATA BUFFERS 
WHEN THE BLOCK TRANSFER IS COMPLETE. 
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SEO 0006 



KTCKOFI rpS^S^I^^HTISS IS CALLED FROM ««SESX»* AMD COHTAIMS THE 

ISf«?OSS I9«^l^5^^nI$Tf5PP^s km isiitiate the block 

TRAWSFER FOR EACH 256C10} B¥TE BLOCK TRANSFER. 

CBKOATS THIS S0BROUTIMS IS CALLED FWn «SFGX»» AMD CHECKS FOR 
DATA Ca«IPARISOII ERRORS AFTER EACH BLOCK TRAHSFER. 

STATR2 THIS SUBROUTIME IS CALLED FROM THE BASIC TESTS 

AMD SETS UP THE ERROR IMFORMATlOU FOR ALL ERRORS 
RELATING TO THE RECEIVER CSR« 

STATX? THIS ROUTINE IS CALLED FROM THE BASIC TESTS AMD SETS 
UP THE ERROR IMFORMATIOM FOR ALL ERRORS RELATING TO 
THE TRANSMITTER CSR, 

CLDLBFs THIS ROUTINE IS CALLED FRO^ "SEGX" AND CLEARS 

BOTH THF OUTPUT AND INPUT DATA BUFFERS IN CORE« 

LDOUTls THIS ROUTINE IS CALLED FROM "S£GX«« AND IS USED TO 

LOAD THE OUTPUT BUFFER MITH THE MULL-DEL-MULL PATTERN. 

L00UT2S THIS ROUTINE IS CALLED FROM "SEGX** AND IS USED TO LOAD 
THE OUTPUT BUFFER iilTH A BINARY UP-COUNT PATTERN. 

L00UT3: THIS ROUTINE IS CALLED FROM "SEGX*» AND IS USED TO LOAD 
THE OUTPUT BUFFER WITH A BINARY DOMN-COUNT PATTERN. 

L00UT4S THIS ROUTINE IS CALLED FROM "SEGX** AND IS USED TO LOAD 

THE OUTPUT BUFFER ilTH THF WONOTOR'S WORST CASE PATTERN. 



8.0 OPERATOR OPTIONS 

A. USF THE won COMMAND TO MODIFY LOCATION «»OLB 16" TO 
CHANGE SRI. REFER TO PARA. 5.0. 

3. NODIFYTNG THE CONTENTS OF MODULE LOCATION "RESTRT 4-2*' 
ALLOWS THE USER TO VARY THE TOTAL NO. OF BYTES TRANS- 
FERRED PER PISS. THIS IS DEFAULTED AT LOAD TIME TO 
2 WHICH RESULTS IN 2048. BYTES TRANSFERRED. 

9.0 NON-STANDARD ERROR PRINTOUTS 



A. IF ANY ONE OF THE FOUR DATA PATTERNS OUTPUT CANNOT BE SUCCESS- 

" IS (3 RETRIES ATTEMPTED) 

OF THE FOLLOHING APPROP- 



FULLY COMPLETED DUE TO SOFT ERRORS (3 RETRIES ATTEMPTED) 
OR A MONITOR "BREAK" TIMEOUT ONE OF -"^ " ' 



RIATF PRINTOUTS MILL OCCUR: 

HSGls '''NULL-DEL-NULL SEQUENCE ABORTED'* 
MSG2I "BINARY UP-COUNT SEQUENCE ABORTED^ 
MSG3S ''BINARY DOWN-COUNT SEQUENCE ABORTED 
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MSG4S "IfORST CASE SEQdEfiCE ABORTED" 

B« IF km FATAL ERROR DETECTED IM SECTIOM OME RESULTS IH A 
DECISION TO DROP THE NODDLE THE FOLLOSIMG MESSAGE IS 
ORINTED; 

•'FATAL ERROR DETECTED IM THE STATIC REGISTER TESTS'* 
AND THE •«EMO" CALL IS EXECUTED TO DROP THE MODULE. 



OLBR nsc/xii 

XDLBBO.Pll 



SySTBM EXERCISER MOOOLE 
i2-aCT-78 12:01 
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jOLll-E DEC/Xll EXERCTSER MODULE 



000000* 
000000- 



lOMOD 
MODULE 

bSxc&m 



feSSoje^LBB J^ll!64S^jE4#ir£li2L*16l 
BR DEC/Xll SYSTEM EXERCISER HODOLE 



<01 
14 

VERSIOM 



8000- 
000' 046104 041102 



ujiu 



000000 



006056- 
000060- 
000062- 
000064; 

ooSolo- 

000072- 
000074- 
000076- 
000100- 



mm- 

000112- 

mur- 

000120- 
000122- 



ooggoo 

002334- 



begin: 

MOONAH: 

xplag: 

§bc?6r: 
BRi: 
BR2: 
DflDl: 

im 

SR3: 

STAT: 
miT: 
SPOIMT: 
PASCNT: 

icowt: 

ICOUNT: 

sofcnt: 
hrdcmt: 

SOFPAS! 

HRDPAS: 

SYSCMT: 

RANlfUM: 

CONFIG: 

RESt: 

RES2: 

SVRO: 
SVRI: 

SfR2: 

SVR3: 

SVR4: 

SVR5: 

S9R6: 

CSRA: 

SBADR: 

acsr: 

WASADR: 

astat: 

ERRTYP: 

asb: 

ANAS: 

rstrt; 

WDTO: 

UDPR: 

ihtr: 
IDNUH; 



«^»»«ftft*ft ft ftftft «««««««««« ft «««« A ftft*««««r ft 



.ASCII /dlbb f ;mqdule name. 

lYTE OPEN 

f-O 



PRTY4*0 

prty+o 



.BYTE 
.BYTE 
♦ I 
OPEN 
QPEn 
OPEd 

opp 

»**ftftft»ftfttt»ft«ftftftftftft«ftftftft 
140000 
START 
MOOSP 


1024. 






OPE» 
OPEM 
OPEI 
OPEM 
OPEN 
OPES 
OPEN 
□PE1 

OPEN 

OPEN 

OPEN 

OPEN 

RFSTRT 

OPEN 

OPEN 

OPEN 

161 



;5sfD TO KEEP TRACK OF WBOFF USAGE 
J 1ST DEVICE ADDR- 
JlST DEVICE VECTOR. 
J 1ST BR LEVEL. 
;2ND RR LEVEL. 
;DEVICE INDICATOR 1. 

;SMITCH REGISTER 1 

»imi«ft85Sl§II5ftJft*ft.ft**ft ************* 
; status uord. 
; module start ador. 
; module stack pointer, 
i pass counter, 

if of iterations per pass=1024» 
;loc to count iterations 

;loc to save soft errors per pass 

; holds random » hhen rand macro is called 

;RESERVE0 for monitor USE 
; RESERVED FOR MONITOR USE 
J RESERVED FOR MONITOR USE 
;LOC TO SAVE PO. 
;LOC TO SAVE Rl. 

jloc to save r2. 
;loc to save r3. 
;loc to save r4. 
;loc to save rs. 
>loc to save r6. 
;ador of current csr. 
; addr of good data, or 

ECONTENTS OF CSR. 
;ADDR OF BAD DATA, OR 
JSTATUS REG CONTENTS. 
;TYPE OF ERROR 
; EXPECTED DATA. 
; ACTUAL DATA. 

^RESTART ADDRESS AFTER END OF PASS 
; WORDS TO MEMORY PER ITERATION 
; WORDS FROM MEMORY PER ITERATION 
;# OF INTERRUPTS PER ITERATION 
; MODULE IDENTIFICATION NUMBER=161 
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000040 -REPT SPSIZ ; MODULE STACK STARTS HERE. 

.NLTST 
.WORD 
.LIST 
.ENDR 

000224- modsp: 

. ************* *ftftft**ft**»*ft*ft**ft ************ ft ****»»« ********* ************ 

407 
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408 
409 

i 

416 

Ml 

m 

ill 

m 

429 
430 



4i- 
4^3 



000224' 016700 177556 

mm- mm 

000236; 010067 003326 

?Ool54- o|ool? 003322 
000250'' 005720 

000252- 010067 003316 



0256' 0051 
0262- 005 



000266' 
000272- 
000276- 



005077 
005777 



000302 
000306' 



005777 
001415 



III mm-snm 



437 
438 
439 

m 
\\i 

444 
445 

448 
449 

il? 

452 
453 
454 
455 
456 
457 
458 

m 

463 



000322- 104405 



000330- 
000336- 



000342' 
000 ||0; 

08835I' 



104403 
104410 



003304 
003300 

mm 

003266 



003260 

mm 

000000- 
000000- 

000000- 



SEQ 0010 



ITHIS 

; 



177564 
000000 
003640- 



012767 



000364- 104405 000000' 



MOV 
KOV 
TST 
MOV 

TST 
MOV 



r: CLR 
CLR 
CLR 
TST 
TST 



ADDR^RO 
RO^DLRCSR 

ROgOLRDBR 

^O.^LXCSR 

Eo,^LXOBR 



;6ET RASE DEVICE ADDRESS 
;SET UP RCVR CSR IDDRESS 

;SET UP RCVR DBR ADDRESS 

;SET UP XHITTR CSR ADDRRSS 

;SET UP XMITTR DBR ADDRESS 



* SECTION ONE * 

*ft* ********** »*«*** ********** 



gDLRCSR 

Idlxcsr 

lOLRDBR 
iDLRORR 



JCLEAR OUT BOTH CSR'S „^ 
;MAKE SURE ALL DATA COMM BITS CLEARED 

?FLUSH RCVR DOHE BIT 



JTEST 

; 



022777 000200 003222 DLT02: 



TEST VERIFIES THAT RCVR CSR GOT CLEARED UPON ENTRY 

I TST gDLRCSR ;IS RCVR CSR ALL ZEROES ?? 

BBQ 0LT02 ;BR IF ¥ES 

?i I* ** **f **%********** *«%»***« ******************* *************** 

h5l8lcllSll'*mi5*******ii41i:i*Syi5*22I*iSI5*SIS************** 

l4SGN$#BEGIN,DRPMS ; ASCII MESSAGE CALL WITH COMHON HEADER 

ESDS/BEGIfi ; 

THAT READY BIT IS OHLY BIT SET IN XMITTR CSR 



000372- 
000400- 



00Q404- 
000412- 
000420- 



104403 
104410 



052777 
022777 

012767 



000000' 
000000' 



177522 
000000 
003640- 



m n 



3160 
3152 



CMP 

ar- 



#200,flDLXCSR 



;ready set ?? 

;BR IF YES 

DP ERROR INFO 



JSR PC,STATX >G0 SET 

MOV i25^ERRTYP 
. ******************************* 
HRDER$, BEGIN, NULL SREADY NOT SET OR OTHER BITS DIDIj-T CLEAR IN XHIT CSR 

s *******»***%****************************** 



************** 



r** ************** A** 



MSGN$£BEGTN,DRPMS 
ENDS/BEGIN 



; ASCII MESSAGE CALL WITH COMMON HEADER 

; 



JTEST THAT MAINT, BIT CAN BE SET AND CLEARED IN XMITCSR 
DLT03: 



#4.|I0LXCSR 
i204,aDLXCSR 

JSR PCeSTATX 

MOV |33fERRTYP 
J ***************** 



BIS 
CMP 

BEQ 



;SET THE MAINT. BIT 

;0in IT SET ?? 
;bh if YES 

>G0 SET UP ERROR INFO 



ft ****************************** ************** 
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464 
465 
466 

m 

469 
470 
471 
472 
473 
474 

k 

477 

478 

Ml 

483 

484 
485 

488 
489 
490 
491 
492 
493 
494 
495 
496 
497 
498 
499 

IS! 

502 
503 
504 
505 
506 

Ul 

509 



513 
514 
515 
516 
517 
518 
519 



000434- 
000442- 

mm- 

000462- 
Q00470- 

000504- 

000512- 
000520- 



104405 
104403 

him 

022777 
001415 

sum 

104405 

104403 
104410 



000000- 
000000- 

000200 

002706 
000025 



000000' 
000000" 



24- 
30- 

34" 



0005: 

mil. , 
m*' n 
um- 

000560- 
000560- 
000564- 
000570- 
000574- 
000576- 
000600- 
000602- 
000606- 



000622- 
000630- 
000634- 
000642- 
000646- 
000650- 



mm 
Mi 

6710 



005767 

mm 

8811?? 

012767 
104405 
104403 

mm 



000000 

003640- 

88iU? 



177402 
000000 
003640- 



MACYll 30A(1052) 12-rjCT-78 I6s28 PAGE 12 

HRDER|,BEGIN,NOLL |MATNT BIT HON-? SET OR IT CLEARED READY 
. ****£%*****%**** *******1^** ************************ ********** 

MSGNSrBFGTN^DRPMS ; ASCII MESSAGE CALL «ITH COMMON HEADER 

ENDS#BEGIN ; 

BIC i4*IlDLXCSR fNOS CLR THE MAINT BIT 

}2D0,9DLXCSR " — 



0^^060 

OOO0I4 

000634- 

177242 

000100 003012 

OOOQQO- 
000000- 
003014 



000000- 

000000- 
000000- 
000100 

002742 



177272 
000000 
003640- 
002730 



022777 000200 002714 



000700- 
000706- 



012767 

104405 

104403 
104410 



002520 
000027 

000000- 

000000- 
000000- 



177214 
000000 
003640- 



CMP 



;DID IT CLEAR ?? 

uoK r*,,o4in* ^v.u 0C.1 Ip ERROR INFO 

MOV M25,ERRT¥P 
. *************************************************************** 

HRD 



J2iii«iisptm*******i^4m*in*i2i:i.s«ii*gi*g§i8i*syiigig 

MSGM Sir BEGIN, DRPMS ; ASCII MESSAGE CALL MITH COMMON HEADER 

ENDS, BEGIN " 



?TeST 

; 



THAT BIT 06 IN XCSR CAN CAUSE AN INTERRUPT 



CLR 

MOV 

ADD 

MOV 

MOVB 

CLR 

BIS 



INTFLG 
VECTOR, RO 



R0> + 
RO) 



SOFTWARE INTR. FLAG 



i4,R0 



00,«DLXCSR 



BREAfCS,BEGIN 
BREAKS, BEGIN 

TST 

BNE 
DEC 
BNE 
JSR 



|NTFLa 

Rl 
IS 

PC,STATX 



2S: 
3S: 



ITEST 

; 



MOV »23,ERRTYP 
• ***************** 

MSGNS, BEGIN, DRPMS 
ENDS, BEGIN 



;INIT THE , 

fGET BASE VECTOR ADDRESS 
;GENERATE AODR OF XMIT VECTOR 
;G0 to 2S on XMIT INTERRUPT 
JPRIORTY LEVEL = BRl 
; INIT BREAK TIMER 
;SET INTR. ENAB 

^TEMPORARY RETURN TO MONITOR..., 
;THEM CONTINUE AT NEXT INSTRUSIIoH. 
;DI0 XMIT INTR OCCUR YET ?? 

jbr if it did 
jcount break timer 
;br if no timeout 
jgo set up error tmfo 

********************************************** 

**clSIIIfi*Sy«2*l8*lilgfSIIi*niiSg!15I*** 

; ASCII MESSAGE CALL WITH COMMON HEADER 



BTC 
COM 
RTI 
CMP 

5iS 



«100,aDLXCSR 
INTFLG 



«200,(1DLXCSR 

.0. minx 

MOV #27,ERRTYP 
. *******%************ 

MSGN$, BEGIN, DRPMS 
ENDS, BEGIN 



?OISABLE XMITTR INTR ENABLE 
?SET THE INTR. FLAG 
JRETURN CONTROL TO OTHER GUY 



;DID I.E. 



GET CLEARED 
ERROR INFO 



IN INTR. SERVICE 



**************************** ft* 

***i:sSS(£:*S5ft5SX«.j;H2i*5?[ft2*SnkS2*I2*S5f£*« 

; ASCII MESSAGE CALL WITH COMMON HEADER 



THAT A RCVR INTR CAN OCCUR WHEN ••DONE" GETS SET 



000712- 005067 002672 



DLT05: CLR 



;INIT SOFTWARE INTR. FLAG 
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M0¥ 
M0» 

MO?B 

SIS 
It 
BNE 
JSR 

Hoy 




,90LRCSR 
,^OLRCSR 



URD!?RS#BEGI1l,mL 

M5G8$# BEGIN, ORPMS 
ENDS, BEGIN 
BIC #100, 

m li"' 

JSR PCjrSTATR 

NOV |23,ERRT.. 

HRDeR$rBEGIN,NDLL 

HSGM$,BRGIN,DRPMS 
END$,BEGIM 

BIS |100,90LRCSR 
BIS i4,PDtxCSR 
CLR HI 

M0^~ 



0?B 



#252,(aDLXDBR 



BREAKS, BEGIN 
BREAKS, BEGIN 
TST INTFLG 
BNE 5S 
DEC Rl 

Jsi ??,STATR 
CLR gOLRCSR 
CLR IdLXCSR 

|23,ERRTVP 

HROER$,REGIM,NULL 

MSGMS, BEGIN ,ORPHS 
ENDS, BEGIN 

MOVB iaDLRDBR,A»AS 



BTC 
CLR 
COM 
RTI 
TST 
BEQ 
JSR 
CLR 
CLR 
MOV 
J *** 



INTFLG 
|DLRCSR 

Sdlxcsr 

|25rERRT]fP 



hrdrrs,regin,noll 



J GET THE base VECTOR ADDRESS 
;G0 to 4$ ON RCVR INTERRUPT 
;SET PRIORITY 
;SBT I-Eg IN RCVR CSR 

jdid it SEf 

^BR IF IT DID 
JGO SET UP ERROR INFO 

ft* ft ««ft*ft*** ft ft 

^IS^filf^SET BIT 06 IM RCSR I-B- 
ft%**ft**ft*«**ft*ttftft 

5 ASCII MESSAGE CALL KITH COMMON HEADER 
;N0W clear THE I.E. BIT 

;go set op error info 

ft«ftft*ftftft*ftftft««ftft***ft«**ikfirftft*«ft**ft«ftftftftfi#« 

ftlSIOftSiegftSSigftlSISsftlSliSftillftftftft*** 
; ascii message call with common header 

;no« turn it on for real 
;turn on matnt. mode 
jinit break timer 

;load the xmittr output data buffer 

; temporary return to monitor.... 
;then continue at next instruction. 

jdid^rcvr intr. yet ?? 

?BR IF it did 
;CaUNT BREAK TIMER 

;rr if no timeout 
;go set up frror info 
iclbar both csr's 

ftftftftftftftftftftftftft ft ft*ft***ft*ft*ft*ft 

JRCVR FAILED TO INTR ON TIME 
ftft ftft ft ft*****ft*****ft ft* ft ftft ft* ftft 

; ASCII MESSAGE CALL WITH COMMON HEADER 

;GET the RECEIVED DATA 
;T0RN OFF I.E. 
JTURN OFF MAINTENANCE MODE 
JSET SOFTWARE INTR. FLAG 

;return to other guy 

;did tntr service clear the rcvr csr 7? 

ibr if it did 

?g0 set up error info 

ICLEAP BOTH CSR'S 

ftft**tt«**ft«*ftft*ft*ft*ftftft««*«r««ft*A««^««ftft«ftft«ftft 

;RCVR INTR SERVICE FAILED TO CLEAR I.E. AND DONE 



DLBB DEC/Xll 
XDLBBO.Pll 
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S1§ 
580 

m 

585 
586 

III 

589 
590 
591 
592 
593 
594 
595 
59fi 
597 
598 
599 

^8? 

602 
603 
604 
605 
606 
607 
608 
6 09 

|1! 

612 
613 
614 

m 

617 

m 
III 

624 



001246' 

nmr- 

001266' 
001304' 

001326- 



403 

111 



10440 
104<" 
122 1 
OOJ321 
016767 
017767 

im 

104404 



001344' 
001352' 



001366' 01276 
01374' 
01402' 

mi: 

01424' 

01432' 
01440' 



627 

628 

631 



000000' 
000000' 
000252 



001332' 005767 

mm- mn^ 



001432' 042777 
001440' 005777 

" J 

001460' 104405 



052777 
32777 



-7 
767 

104405 

032777 
001010 

104405 



001466' 052777 
001474' 005777 



mil 

002250 



176460 
000770 



000004 
000004 

002000 
000025 

000000' 

040000 

001750 
000025 

000000' 

000004 
002122 

mhi 

000000' 



000010 
002066 



003640' 

176622 

176602 
176576 



ftftftftftftftftftftftftftftftftftft ft*** ft*** ft ****«« ftftftftft ft* ftftftft ************* ftftftft 



llSGNS, BEGIN, DRP^S 
ENDS, BEGIN 
CMPB #252,AWAS 

BEQ fir--' 



ODEM 
_LRCSR,uaKii 
aOLRCSR,ACSR 
1252, ASB 
OLRDBR,VASADR 



MOV 

MOV 

MOV , _ 

MOV DLXOBR,SBADR 

******* ft* ************ ft* 



; ASCII MESSAGE CALL WITH COMMON HEADER 

;VAS DATA CORRECT ??? 
;BH IF YES 
;SET UP ERROR INFO 



************** 



rftft*** ***************** 



^llblStf^iSE^* ******** ***Sr*4X4fti**9ft* lift****** ************* ****** 

;THE FOLLOWING GROUP OF BASIC TESTS ASSUME THAT THE MODEM IS DISCONMECT- 
;E0 from THE DLll-E AND AN H315 MODEM TEST CONNECTOR IS CONNECTED IN ITS 
;PLACF- ALL OF TH ESF TESTS ARF SKIPPED IF SR1(15) IS CLEARED. 



TST 
8MI 
JMP 



SRI 

DLT06 

RESTRT 



;T£ST THAT "HFQ TO SEND' 



?IS SRI BIT 15 = 1 77 

;do modem tests ii 

;SKTP MODEM TESTS 
CAN ASSERT "RING" 



;do modem tests if set 

_ jp SR1(15)=0 



002214 
002206 



176512 
000000 
002156 

176462 
000000 
002126 

176426 
000000 



;SET R£Q TO SEND 
lOID IT SFT ?? 

BR IF YES 
;G0 SET UP ERROR INFO 



IS: 



2$: 



BIS |4,(30LRCSR 

BIT 14, GOLRCSR 

3NE IS 

JSR PC,STATR 

'?*l*****l*lil**I*l** 

fi2iiifiii4Sdi^C!I****iSis:Xftiii*5i§^ 

BIT »40000,(iDLRCSR J DID "RING" GET ASSERTED 7? 

BNE 2$ ;BR IF YES 

JSR PC,STATR ;gQ SET UP ERROR INFO 

MOV #25,ERRTYP 

**************************************************************** 

h8S55t5SSn*m^f*******i:852*I2*5§«2:*Sl55i:i*li5§55I*:glJIS:***** 



****************** ******************* 

****** 



BIC 
TST 
BEQ 
JSR 



ft(*{7'Z*ft*ft* 
«4#»DLRCSR 

gDLftCSR 
LT07 



;turn off "reo to send" 
; are all bits hon clear ?? 

;BR IF BOTH "PING" AND "RRQ TO SEND 
;G0 SET UP ERROR INFO 



JTEST THAT 
J 



MOV I^S^Ir^TYP " "■" 

. *************************************************************** 

HRDERS,BEGIN,NULL {"RING" OR "REQ TO SEND" FAILED TO CLEAR 

. *************************************************************** 

SEC XMIT" ASSERTS "SEC REC" WHICH SETS "DATA SET INT" 



002072 DLT07: 



BTS 
TST 
BMI 
JSR 



#10,aOLRCSR 
BDLRCSR 



BDLR 



;SET SEC XMIT 

;0ID DATA SET INT GET SET ?? 
I BR IF YES 

|G0 SET UP ERROR TNFO 
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6 32 
633 
634 
635 

%h 

63fl 

m 
til 
m 

645 

in 

648 
649 
650 
651 
652 
653 
654 

m 
ii 
m 

IVi 

663 

m 

668 
669 

6— 

hi 

673 



68- 
681 



001506' 

001514" 

001522' 
001530' 

001544' 

001552' 
001560' 
00'-' 



012767 

104405 

777 

004767 
012767 



m 

)047i 
)127< 

L044I 

?4277 
0577 
0041 



777 
777 

"O 



001600' 104405 
001620' 012767 



:0' 

001626- 



01 2i 
104405 



nmr- 

001652' 
001654' 
001660' 

001664' 



005077 

80I777 
100407 

104405 



73 

i 

80 oof?!!' iSo407 



001702' 004767 
001706' 005067 

001712' 104405 



001734' 
001740' 



004767 
005067 



001744' 104405 



001752' 
001756' 



005777 
001407 



000025 
000000 
002010 

mm 



176372 
' 000000 
002036 



176342 

104405 000000' 000000 
002006 



o8io20 

000000 

001754 

001546 
000020 



001726 

mm 
mm 

000000' 

030002 

001460 
176174 

000000' 

m 

001426 
176142 

000000- 

001610 



176306 
• 000000 



176260 
000000 



000000 
001666 



000000 
001640 



Of 

***** 

. ftS*^li§f §l*i**&&ft*** 

CMP i2010,9DLRCSR 
BRQ 2S 
JSR PC,STATR 

?2](*****t2l*S5Sng***** 
«28fgfdfgnjmi*******i§SS*52II*2g*fl2*5fS*5nJf£2*I2*55I*;*2n* ^kt imt failed 



************** ft ********* ******************* 

^*ftl2*****^I«l*I**»i*i2ft***i£I**ft ********** 
;SEC XMIT AUD REG SET - DATA SET INT CLEAR 
;BH IP YES 

;G0 SET UP ERROR IMFO 



********************* 



^*ft********» ********** 



III 

JSR 
J *** 



pfe;STATR 
26#ERRTyP 

'-^**********» 



;TURN OFF SBC XMIT 

IDID SEC SHIT GOIMG OFF SET DATA SET IMT ? 
;BR if YES 

JGO SET UP ERROR INFO 

******************** ft ****4«« ft ft 

JCLFARIMG SEC XMIT FAILED TO SET DATA SET INT 
**************************************** 

; ALL BITS NOW CLEAR 

?BR IF YES 

JGO SET UP ERROR INFO 
****************************************** 

^ JSBC XMIT,SEC REC. OR DATA SET INT FAILED TO CLEAR 

**%******#*%*******%********************** 



;test 
I 



BMI 

JSR PC-STATR 

m*****ll4d?m5**** 

HRDER$,BEGIN«NULL 
]***********»********* 

8DLRCSR 

*l 

THAT "DTK" ASSERTS "CAR DET", "CLR TO SEND", AND "DATA SET INT" 



3S: 



CLR 

m 

BMI 
JSR 
CLR 
^ **** 

HROER 

;**** 

CMP 
BEQ 
JSR 

jy** 

HRDER; 
,** - 

BIC 
TST 
BMI 
JSR 
CLR 

i**** 
ROER 
. **** 

TST 

BEQ 



gDLRCSR ;CLR THE RC¥R CSR 

mM"" m m Wimh 

1$ >BR IF YES 

PC#STATR ;G0 SET DP ERROR INFO 

***§$************************** *********** ft** ****»»******«* 

S#BEGIN,NULL 5"DTR" FAILED TO SET "DATA SET INT" 

*******************%**************************«************ 

AND DATA SET INT CLEAR ? 



#30002, aOLRCSRj DTP, CLP TO SEND, CAR DET, SET 

Is __. _ ;br if yes 



PCSTATR ;G0 SET UP ERROR INFO 

***i**XIS**ft******ft ft ********************* 

S#BEGIN/HULL ;DTP,CAR DEf, OR CLR TO SEND FAILED TO SET OR DATA SET I 

*********************************************************** 



************************** 



|2,aDLRCSR ;TURN OFF DTR 

IdLrcsr — ""■ — — 



;data set inf 
;br IF IT_Dip 



SHOULD HAVE SET 



PCrSTATR ;G0 SET UP ERROR INFO 

***S**I)(S** ************* ******* 



************************** ft* 



;DATA SET INT FAILED TO SET ON CLEARING DTR 

ft* ********************** ft* ***************** 



?ALL I 

;br II 



ITS NOW CLEAR 77 

YES 



OLBR DE 
XDLBBO 

688 

m 
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004767 
005067 



001770' 104405 



001776 

002004' 

002012- 

002014- 

002020' 

002026' 



002062' 



738 
739 



052777 

llm 

012767 
104405 
042777 

mm 

104405 
000463 



005067 
016700 

052777 

104407 
104407 

km 
am 

— *767 
077 



mm 



001402 
176116 

000000- 



000040 
000040 



001346 
000027 



000040 
001520 



001312 
000027 



001562 
001554 



176060 
000000 
001524 

176024 
000000 



001512 
17S706 
002174- 

000040 001450 
000010 001442 

000000- 
QOOOOO- 
001450 



-013_ 
004767 
005077 
012767 



001214 



002164- 104405 000000' 



175722 
000000 



000422 

001410 
004767 



000040 001364 
001402 

000040 001350 
001142 



GO SET UP ERROR INFO 
************************* 



r**************** 



;test 

J 



JSR PC.STATR 

^Sfi***ftftl**II******** 

THAT DATA SET INTR ENAB CAN SET AND CLEAR 



BIS 
BIT 
8NE 
JSR 

m 



#41 



40,flnLRCSR ;SfiT DATA SET I.E. 

-0, gDLRCSR ;DID IT SET 77 

;b« if yes 

;g0 set up error info 

************* *************** 



PC,STATR 



JTEST 
I 



******* *»**»***« ******************** *********** ********* 

HRDBRS#BEGIS,HULL JCAN'T SET DATA SET INTR- 

^ **************************** *************************** 

BIC #40#gDLRCSR ;CLEAR DATA SET I.E. 

SIS hW" igj^rrgk"" " 

JSR PCRSTATR ;G0 SET UP ERROR INFO 

^*l****«fi*i§§iXIS***« ******************************** ft* 

;i2iglslli«imfe****»**iil2:i*S^II5*2III*lll*l-*l-***ft*** 

BR DLT13 ;SKIP NEXT TEST 

THAT DATA SET INT CAN CAUSE A RC?R INTERRUPT WHEN ENABLED 



******** 
******** 



******** 
******** 



2S: 
3S: 



INTFLG 
?EC 



r.uTOR,RO 
2$,(R0)+ 



U 

#40, gDLRCSR 
#10, gDLRCSR 



MOV 
CLR 
BTS 
BIS 

BREAK$,BE6IN 

n 

PC,STATR 
BDLRCSR 
MOV l23,|RRTYP 
• *****************.. 

HROERffBEGIH, NULL 
• ****************** 

BR DLT13 
BIC |40, gDLRCSR 

COM INTPLG 
RTI 
BIT 



TSf 
BNE 
DEC 
BNE 
JSR 
CLR 



BEQ 

js- 



PCSTITR 



jlntt software tntr. flag 
;get bas vector ADDR« 
jgo to 2$ on data set interrupt 

;INIT BREAK TIMER 
;ENABLE DATA SET INTR. 
;SET SEC XMIT 

^TEMPORARY RETURN TO MONITOR.... 
;BR IF YES 

;COnNT THE BREAK TIMER 
;BR IF MO TIMEOUT 
JGO SET UP ERROR INFO 
;TURH OFF THE I.E. BIT 

************************************************ 

SDATA SET INTR. FAILED TO OCCUR 

****************************************** 

;G0 to next TEST 
;TURN off DATA SET I.E. 
;SET SOFTWARE INTR. FLAG 
;RETURN CONTROL TO OTHER GUY 
;DI0 INTR SERVICE TURN OFF I.E. ? 
iBn IF YES 

;go set up error info 



12-OCT- 
012767 
104405 



000023 175654 
000000- 000000 




MACyil 30a(10S2) 12-0CT-78 16:28 PAGE 17 



;TEST THAT "BREAK" BIT CAN SET 
, , 

DLT13: BIS 
Bit 
BME 

JSB PCjrSTATX 



«««« 



8DLXCSR 
D 



lOUCSR 



*SET BREAK BIT 
IDID IT SET ?? 

5S8 SET^ii ERROR INFO 
*****»*«***********««***« 

lie tl,||DLXCSR 



***«' 



SIS 



JSR 
HOV 



" STATX 



XCSR 



; CLEAR THE BREAST BIT 
}G0 SET OP ERROR INFO 



**»»■< 



iBREAIf BIT WON'T CLEAR 

«r*ft ft* ft* 



ft»«*«ft«ft 
ft*ft«*ft«« 



ftftft* 
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001242 




002444' 104413 000000' 
002450- 000752 



1$: 



MOV 

MOV 

MOVB 

TST 

MOV 

HOVB 

MOV 

MOV 

CLR 

TST 

TST 

MOV 

MOV 

JSR 

CMP 

SHE 



ft «r* ft ft «* ************** 

* SECTION TMO * 
ftftftftftftftftftftftftftftftftftftftftft 



XEND 

VECTOH^RO 
fRINTr(RO)* 

|LDTAR£R3 

90LR0BR 

?R3)*#LDO0T 
(R4)+,AMESS 
PC,SEGX 
jMf AB#R3 



EMDITS#BER|M 



;CLEAR END FLAGS 

JCLEAP THE DLll CONTROL REGS 

;JOST IN CASE 

;CET START VECTOR ADDRESS 

;SET OP THE HCVR AND XMfT VECTORS 



JPOTNT TO TABLE OF LOAD SOBR, POINTERS 
JPOTNT TO TABLE OF MESSAGE POINTERS 
ICLEAR RETR? FLAGS 
;FLUSH RCVR INPOT BUFFER REG 

;SET UP CORRECT LOAD BOF ADDRESS POINTER 

JSBT OP MESSAGE POINTER 

;G0 00 A SEGMENT 

;DOME ALL FOUR SEGMENTS ?? 

JBR IF NOT 



5gSS»bR^g8,E[ iimm. PASS 



OLBB OEC/Xll S¥S?eM EIERCTSER MODULE 
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ITHIS ROUTIHE SERVICES ALL XMITTR INTRPTS. FOR RLL 256- BYTE SFERS 



002452*' 
002456' 


mm 


001114 




XIHT: 


TSTB 

BNI 


I^LXCSR 


JXMIT READY SET 77 
;BR IF YES 






002460' 


000004 


000000- 


002516- 






BEGIN, 4$ 


; QUEDE UP TO CONTINUE 


»T 4S km 


HTI 


002466- 
002474- 

nuir- 

002510- 


022767 
001405 
117777 
005267 


004522- 

nm 


001104 
001070 


IS: 
2S: 
3S: 


Jwp 

BFQ 
MOYB 

inc 


||LBUFI,OPTR 
gg|TR,80LXDBR 


;00TPUT 256. BYTES YET 
;BR IF YES 


?? 

BUFFER 




002510- 


000004 


000000- 


002610- 




JirSL 


BEGIN, 6S 


; QUEUE UP TO CONTINUE 


AT 6S AND 


RTI 



002516- 

mm- 

002532- 

mnr- 

002552- 
002560- 

002566- 
002572- 



017767 
042777 
105167 

012767 

104405 



>5077 
14410 



042777 
604- 104400 



002616- 104400 



001061 

001042 
001034 

mm 

000011 
000000- 

000774 
000000- 

000100 
000000- 

000767 

000000- 



001024 



175326 
000000 



TSTB 

BNE 

MOV 

M0¥ 



XCSR,CSRA 

ILXCSR,ACSR 
104,9DLXCSR 



5S: 
6$: 



>THIS 
f 



BIC 

COMB Send 

NOV lUrERRTYP 
• ****** ******* 

hroer$«regin,null 

f ***ft*%*****lr****ft****ft*1 

CLR aOLRCSR 
ENDS, begin 

BIC #100,glDLXCSR 
EXITS, BEGIN 

TSTB XEND>1 

BNE 5S 
EXITS, BEGIN 



;ANY FATAL RCVR. ERRORS PENDING ?? 
;BR if yes - STOP XMITTING 
;SAVE THE CSR ADDRESS 
;SAVE THE CONTENTS OF THE CSR 



****************************************** 

4Iilim*5iyi*II[|ISI2n*;*IIIIfe*iii8i** 



JTURN OFF RCVR INTR. 
} 

JDISARLE XMITTR- INTERRUPTS 

;EXIT TO MONITOR- MODULE WAIT FOR INTERRUPT- 

;ANY FATAL RCVR- ERRORS PENDING ?? 
;br if YES 

;EXIT to MONITOR. MODULE WAIT FOR INTERRUPT. 



ROUTINE SERVICES RECEIVER INTERRUPTS FOR ALL 256. BYTE XFERS 



002622- 
002626- 


105777 
100403 


000740 




RTNT: 


002630- 


000004 


000000- 


002702- 




002636- 
002642- 


005777 
100003 


000726 




IS: 


002644- 


000004 


000000- 


002774- 




002652- 
002660- 


022767 
001405 
117777 
005267 


005122- 


000716 
000706 


2S: 



TSTB 
-MI 



|DLRCSR 



BMI IS 

tiRaiJiiGiN^ii' 

|sT IgLRDBR 

liRQiTipGiNTii* 

BEQ 
MOVB 
IMC 



;RCVR DONE SET ?? 
;BR IF YES 



; QUEUE UP TO_CONTINUE AT 3S AND RTI 

JoVRRRUN/PARITYjFRAMiNG'ERRORs"?? 
;BR IF NONE 



; QUEUE OP TO CONTINUE AT 5$ AND RTI 



||UFEND,IPTR 
|g|RDBR,iIPTR 



; INPUT BUFFER FULL ?? 
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869 
861 

ill 

865 

m 

868 
869 
870 
871 
872 
873 

III 



890 
891 
892 

m 
m 

899 



002674- 
002674- 



002702- 105767 



2724- 



602724- oil?? 
02732- 10516 



7 

167 



0027] 
002 72 . 
002732' 

002736- 012767 

002744- 104405 

002752- 005077 
002756- 104410 

002762- 042777 
002770- 104400 

oqIooo- ioflfo 

003002- 

003019" 
0030 
003C 



3010- Ql??t7 
3016- 017767 
3024- 042777 



003032- 
003040- 



012767 
104405 



003062- 

mm- 



MACYll 
7S: 
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000004 000000- 003062- 



000674 

000652 
000644 
000100 
000645 

000011 

000000- 



IMv llMi Bill 



105767 

nun 



000514 
000000- 



175142 
000000 



000614 
000000- 

000100 
000000- 

000602 

>0560 

)Q546 

)0100 

000017 
000000- 



4$: 
5S: 



175060 
000534 

175046 

000000 



fTRQ$,BEGIN,6S 
, 



TSTB XEND 

BNE 4$ 

MOV 0LRCSR,CSRA 

MOV @DLRCSR,ACSR 

8TC |100,9DLRCSR 
COMB 



} QUEUE UP TO CONTINUE AT 6S AND RTI 



Ibno+1 



; ANY FATAL XMITTR ERROR PENDING 
JBR IF YES 

;SAVE THE RCVR. CSR ADDRESS 
;SAVE CONTENTS OF CSR 
JTOPN OFF THE RCVR. 
JSET FATAL RCVR ERROR FLAG 



***************************** 



r****ftft**ft**ft***«* 



^*I*****f 14 £*««**** 

HROERS,BEGIN,NOLL SRECEIVER FALSE IWTERRUPT - FATAL ERROR 

^ ******** ************************** ft ******************** ******** 



CLR BDLXCSR 
gUDS, BEGIN 

BIC tlOO,QDLRCSR 
EXITS, BEGIN 



^DISABLE XMITTR TOO 



TSTB 

BNE 4$ 

MOV DLRCSR.CSRA 

MOV aDLRCSR,ACSR 

MOV 5dlrdbr,astat 

3TC »100,QDLRCSR 



;bxit to wonito 

;any fatal xmittr errors pending ?? 
jbr ip yes 
?save csr address 
;save contents of csr 
;save the error flags 

fOISABLB RCVR INTR. 



MODULE WAIT FOR INTERRUPT. 



********************* ******************* 



MOV 117-ERRTYP 
. **********%************ 

fiRDERS,RE':iN#NULL fOVBRPUH - PARITY - FPA»»ING ERROR 

I *»**♦%**»**%*******«**♦»***»****«******»************«***«***««« 



gDLXCSR 

RT-" 



CLR ^ _ 

INCH ftTRY 
EXITS, BEGIN 

TSTB XEND 
BNE 4$ 
EXITS, BEGIN 



lEXIT TO MONITOR. MODULE WAIT FOR INTERRUPT. 

;ANY fatal XMITTR ERRORS PENDING ?? 
SBR IF YES 

;BXIT TO MONITOR. MODULE WAIT FOR INTERRUPT. 



0LBB DEC/Xll SYSTEM EKKRCTSSR HODOLE 
lOLBBO.Pll 12-0CT-78 I2s01 




9 
9 

9, 
93B 
939 
940 
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J THIS ROOTIME COMfRQLS THE EXRCOTIOH OF EftCH OF THE FOUR DATA PATTERNS 



SEGX: 

1$: 



3S: 



oooll 

00000^ 000425 



000000' 003634' 
000034 



mm- mvi mm- mm 

003250' 000207 



012i|o 




im im 

310' 000207 

003312' 016767 
003320' 114067 

mm- mifi 



OQOIOO 
000100 
004122' 
004522' 



mm 



000250 
174562 

mm 



NOP 
JSR 
JSR 
JSR 
CLR 

BREUKI 
BREAKS, 
TST 
BEQ 

m, 

INCB 
CNPB 
BME 



PC^CLOLBF 
PCgLOOOT 
PC,KICK0F 
R2 

#BEGIM 
^BEGIM 
XEND 

EGIN 
RTRY 

rIry 

RTRY*l 

i3rRTRir*l 



;D0 NOTHING FOR NOU 

;gq clear buffers 
;gq set up pattern 
;g0 kick off xhittr and rcvr 

IINITIALIZE BREAK TIMRR 
TEMPORARY RETURN TO MONITOR.... 



THEN CONTINUE AT NEXT INSTRUCTION. 
ANY FATAL FRRQRS PENDING ?7 



JBR IF NOf 



005122' 000402 4S: 



§MP 
BEQ 
DEC 
BNE 

HSGN$,B 

RTS 
JSR 
RTS 



ftBUFEN0#IPTR 

J! 

2S 

EGlNrAMESS 

PC 

PC^CHKDAT 

PC 



iBXIT TO MONITOR. 
RETRY FLAG SET ?? 
IR IF NOT 

:li4r |he 



MODULE WAIT FOR INTERRUPT. 



FLAG 

~ET— 



COflNT ONE RETRY 
TRIED THREE TIMES ?? 
BR IF NOT - TRY IT AGA 
REPORT IT AND GO TO NB . _ 
RECEIVED 256. CHARS. ?? 
BR IF YES 

DECREMENT BREAK COUNTER 
BR IF NO TIMEOUT 



; ASCII MESSAGE CALL WITH COMMON HEADER 
J GO TO NEXT SEGMENT 
;GQ COMPARE IN/OUT DATA 
;G0 TO NEXT SEGMENT 



;THIS ROUTINE KICKS OFF ALL 256. BYTE TRANSFERS 

; . 



HOV 
MOV 
BIS 
BIS 
RTS 



1DLBUF0#0PTR 
DLBUFI,|PTR 
104,HDLXCSR 
100,(3DLRCSR 
C 



;POINT TO BEGINNING 
;POINT TO BEGINNING 
JTURN ON XMITTER 
;TURN ON RCVR. 
^RETURN TO CALLING SEGMENT 



INPUT BUFFER 



;THTS routine CHECKS FOR AND REPORTS DATA COMPARE ERRORS 
, 

CHKDAT: BIC 



3$: 



174560 2S: 



mOv 

MOV 

CMPB 

BNE 

CMP 

BNE 

RTS 

HOV 
M0V3 
BIC 
MOV 



|dlbopo#ro 
1dlbufi,ri 

(R0)*,(R1)* 

|BUFEND,R1 

PC 

DLRCSR#CSRA 
-CRO)rASB 



?R0 POIN 



. LE RCVR INTH. 
, . . OINTS TO OUTPUT BUFFER 
;R1 POINTS TO INPUT BUFFER 
; COMPARE INPUT WITH OUTPUT 
;BR IF NOT EQUAL 
J END OF THE BUFFERS 7? 
J BR IF NOT 
;RETURN TO CALLER 

;SAVE THE CSR ADDRESS 
;SAVE THE SHOULD BE DATA 

;il§i ?Je^Ih6uLD be ADDRESS 



DLBB DEC/Xll SYSTEM EXERCISER MODULE 
XDLBBO.Pll 12-0CT-78 " 



958 
959 
960 

m 

963 
964 

m 
III 

972 

m 

975 
976 

til 

981 
982 
983 
984 
985 
986 
987 
988 
989 
990 

III 

m 

995 

998 

iJSS 
1001 



003350' 



Am 

)10167 



I2:df 

174! 
177 

174' 
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.546 
.'400 
74530 



174540 



003354' 104404 000000' 
003360' 105720 

mm- mm 



mm- mm mm \ni 

003402' 000207 



mm- mm 



on - 

000207 



003422' 012700 
003426- 005020 
003430' 022700 



isll: mil 



00345 
00|4r 
00341 



003462' Oi: 

003466' oor 

470' " 



ii m m 

1013 



1700 
001 



000162 
000154 



004122' 
005122' 



004122- 

000377 
004522- 



004122' 



H4466 
4462 



003502 
003504 



MOVB 

BIC 

MOV 



jiSUfioHiwAs 



;SAVE THE HAS DATA 
;CLEAR OUT HI BYTE 
;SAVE THE HAS ADDRESS 



D*TFRS,BEGIN ;DATA ERROR! it 

; POINT TO NEXT BYTE IN THE BUFFERS 
JGO CHECK NEXT BYTE 
RaUTINBS SET UP THE ERROR INFORMATION FOR THE BASIC TESTS 



TST8 
TST8 
BR 



(R01 + 



MOV 

MOV 
RTS 

MOV 
HOV 

RTS 



DLRCSR,CSR 
pDLRCSRrAC 



DLXCSR-CSRA 
gDLXCSR^ACSR 



imi m uhmm the csr 

;RETURN TO BASIC TESTS 

;SAVE THE CSR ADDRESS 

;SAVE THE CONTENTS OF THE CSR 

;RET0RN to THE BASIC TESTS 



J THIS 
, 



ROUTINE IS USED TO CLEAR THE INPUT/OUTPUT BUFFERS 



CLDLBP: 



MOV 
CLR 
CMP 
BNE 
RTS 



|Dj,BUKD,RO 
|BUFEND,R0 
P? 



;P0INT RO TO BEGINNING OF BUFFERS 
; CLEAR ONE WORD - UPDATE POINTER 
;DONE 256. BYTES 77 
J BR IF NOT 

;RETORN TO CALLING SEGMENT 



;this 

; 



ROUTINE LOADS THE OUTPUT BUFFER WITH A NULL-DEL-NULL PATTERN 



LDOUTl: 



CLR8 

MOVB 

CMP 

BNE 

HTS 



#DLBUFQ,RO 
#377-(R0)+ 

|dlbufi,ro 



;MOV A DELETE CHAR. 
; BUFFER FULL ??? 
;BR IF NOT 

;RETURH TO CALLING SEGMENT 



;THIS routine is used to load an ASCENDING BINARY COUNT PATTERN 



LD0UT2: MOV 
CLR 

IS: MOVB 
CMP 
BEQ 
INCB 

2$: RTS 



#DLBUFO,R0 

rLcro)* 
«dlbufi,ro 

PC 



;SET UP POINTER 

;pSfRl TO GENERATE THE PATTERN 
;LQAD ONE CHAR, 
f BUFFER FULL ??? 
;BR IF YES 

/GENERATE NEXT CHAR. 
;G0 MOVE IT 

;RETORN TO CALLING SEGMENT 



;THTS routine is used to load the DESCENDING BINARY COUNT PATTERN 



DLBB DEC/Xll SYSTEM EXERCISER MODOLE 
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i 

h 
m 
mi 



003506* 012700 

88ii}i-' mm 

003532- 000207 



003534- 012700 

000770 
000207 



oooH? 

004522- 




085124- 
004522- 
005224- 



LD00T3: MOV 
NOV 

1$: NOVB 
CMP 

OiCB 



|DLBUFO#RO 

mm* 

iOLBOFI^RO 



2S: 



RTS 



ISET DP POIWTER 
fSTART Rl AT 377 

Road one char. 

i at epo of the buffer ?7 

IIInIratPhejct char. 

SgO NOVB IT 

; return TO CALLING SEGMENT 



JTHIS ROUTINE 

; 



D0UT4S MOV 
MOV 
MOV 
CMP 
BFQ 
CMP 

3S: RTS 



LOADS THE WORST CASE PATTERN 



LD 

51 



|olbufo,ro 
|SId#1?r3* 

iicASBE/Rl 



;SET UP POINTERS 

JPQTMT TO MQMITOR-S HORST CASE PATTERN 
HOliD ONE WORD 
; BUFFER FULL ??7 
;br if YES 



;gND 01 
;dQ REi 



OF HORST CASE PATTERN ?? 



;RETURN TO CALLING SEGMENT 



DLBB DEC/Ill SVSTBM E|E 
XDLBBO.Pll l2-0CT-7f 



RC|S|R MODULE 



mi 

m 

1042 

li 
m 



3572- 
3574- 



003576- 
003600- 



000000 
000000 



PI 

1058 
1059 

m 
m 

068 

m 

i 

m 
im 

Ml 

1086 

Ml 
mi 

1092 



003610 



003614- 663462- 

" 36|6- 



3602- 000000 

mi' mm 

000000 

003440- 
003462- 
003506- 

4- 003705- 

6- 003750- 
004015- 

OOQOOO 

mr 

"^53- 
. . .'77 
47045 
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IVARIABLES^FLAGS, MESSAGES, AND BUFFERS 



DLRCSR: 

dlrdbr: ope 

dlxcsr: open 

dlxobr: open 



003756- 020131 

mm- mh 

im mi 



mn 

044ioS 
052440 

mil 

mm 

020105 
042524 

045 047527 



«J4 



mm 

042524 



004053- 



nil 

045 



042524 
040506 



iptr: 

OPTR: 
xehd: 

EPCTR! 

rtrt: 
intflg: 

LDTAB: 



LDQUT: 
AMESS: 

DRPNS: 

MSGl: 



OPEN 
OPEN 

OPEN 
OPEN 
OPEN 
OPEN 

LOOUTl 
LD0UT2 
L00UT3 
UQQ7T4 



NSG3 
MSG4 

QPEif 
N|6l 

NSG5 



, ADDRESS OF PCVR CSR 

;COHf AIMS ADDRESS OP RCVR DBR 
1 CONTAINS ADDRESS OF XMITTR CSR 
; CONTAINS ADDRESS OF XMITTR DBR 

ICONTAINS POINTER TO INPUT BUFFER 
; CONTAINS POINTER TO OUTPUT BUFFER 

IFATAL ERROR END FLAGS 
;END OF PASS COUNTER 

;retr? flag and counter 

; SOFTWARE INTR. FLAG USED BY BASIC TESTS 

^POINTER TO 1ST LOAD BUFFER SUBR. 
;POINTER TO 2ND LOAD BUFFER ROUTINE 
IPOINTER TO 3RD LOAD BUFFER ROUTINE 

mm 18 siSsm-i"""*" """""^ 

;POINTBR TO MESSAGE 2 
^POINTER TO MESSAGE 3 
^POINTER TO MESSAGE 4 

^CONTAINS POINTER TO LOAD BUFFER SUBR. 
^MESSAGE POINTERS 



; MESS A 



ASCIZ /«NULL-D EL-NULL 



E ABORTED!/ 



MSGS: 



.ASCIZ /IBTHARf UP COUNT SEQUENCE ABORTED^/ 



.ASCIZ /IBINARY DOWN COUNT SEQUENCE ABORTED!/ 



.ASCIZ /IWORST CASE SEQUENCE ABORTED!/ 



.ASCIZ /tFATAL ERROR IN STATIC REGISTER TESTS!/ 



XDLiBO.Pll 12-0CT-78 12:01 

m 



im- WM ii llfi 



004116- 051524 000045 



III 



MACyil 30a(1052> 12-fJCf~78 16:28 PSGB 25 



}S12 HQROS RESERVED FOR fHO 256. BYTE BUFFERS 
, 



EE lip 

" ^ ' '77377 



BOFEMD: I MARK END OF BUFFER AREA 



mm 
m 



Od|164' 12731 7§t77 

li Ihmhim km 
M M: 

Ill 000001 



177775 
000004 

177737 
000100 

176777 
002000 

157777 
040000 



.«ORD 177776,1#177775#2# 177773,4,177767, 10 

. WORD 177757, 20, 177737, 40, 177677, 1 00, 1 77577,200 

.»ORD 177377,400,176777,1000,175777,2000,173777,4000 

.HORD 167777,10000#157777,20000#137777, 40000, 77777,100000 



MCASEE: 

.END 



im mm 

ADOR22= 001000 

III" MB 



1 m* m* '5§s» 956* 



AVAS OOOUOR 394| 563* 579 958* 959* 

BKI« OOUU Ml m m |JJ «J ^ «3 4 . 466 ^6 ^74 477 

59 561 562 575 577 578 587 607 614 622 



BOFEND 005122R 
CDATAS= 10441* 



00056R 

.OOlOOR 

DATCKSx 104411 

mm' ilUh 




BITO = 000001 
BTTl = 000002 
BITIO - 002000 

i\m I inm 

BIT13 > 020000 

If ilffl 

BIfl = 000010 

m mm 

BfT6 000100 

BIT9 = 001000 

m tlh 



561 562 575 577 §78 587 607 

656 66? 676 684 691 703 711 725 726 735 

798 610 818 830 834 837 841 849 854 862 

892 897 901 910 911 914 927 963 



mm mm 

CSr"^ OOOIOOR 3875 581* 823* 867* 885* 954* 973* 977* 



. ,- .-.2R 812 936 947 996 1007 1019 1031 llOSf 

BOFO 004122R 935 946 994 993 1004 1016 1028 11041 



gM?s'J 00Si66R 415* «3. JJj: 432 «3. «4 SM* |34. 543. SSS- 564; 568 571. 

' flf: 8*11, it? Sir nil III iw mi 

003570R 412* 426 451 563 584 7B5* 786 851 858 887 1041« 

DLTOl 000302R 

mu mm 

DLT04 000524R 

mil mm 
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mu mi 

DLXCSR 00357 



DUDBR 

DRPMS 
DflDl 
EMDitS 



4l 



_ ill 

EHD| = 104410 

m% mn 



EKITS = 104400 

GMBOr|= 
ilRDCNt 
HROBRS: 



104400 



00Q050R 
0000|6R 



mi 

Im 



HRDFAS 
ICOUT 

jconuT 

IDNUM 
IMIT 
Mf FLG 

R 

K|C»rOF 
LDOOT 
LDOQTl 

mm 

LIKJUT4 003534R 

NOOBN 0Q13|2R 
MOONAPf OOOOOOR 
MODSP 90Q224R 
MSGMS = 104403 

Siir : mil 

im mm 

^ m 



MSGl 
G5 



MSG' 
HfkB 
HULL 



m 

414* 

if 



m 



mi 



106S 
783 

758 



w 

798 
440 



111 



492 
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CROSS RfrBRBMCf TABLE — OSER SfMBOLS 

51i 



993f 1053 

mn m 

10281 1056 
m, 594» 

1063 



466 
453 



504* 
859* 
1062« 



452 
1067» 

w 



IK 

476 

467 
462* 



464 

hi 



519* 
922 



ill 



459 

mil 


468* 
774* 


469 
807 


488* 
823 


503* 
824 


506 
825* 


544* 
836* 


556* 
877* 


565* 
895* 


501 


513 


531 


541 


561 


577 


1065f 






477 


502 


514 


532 


542 


562 


578 


834 


878 


472* 

If 


497* 
667* 






mi 


m- 


mi 


mi 




901 


914 














m 

892 


499 
669 


m 


m 




559 
703 


Vtl 






550 


566* 


718* 


727 


739* 


1051f 










104S# 
















476 


501 


513 


531 


541 


561 


577 


927 




474 


in 


m 


529 
684 


ii! 


559 
703 


575 
711 


607 
735 
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XOLBBO. Pll 12-0CT-78 12:01 CROSS RKFERE""" — 



0000|4R 
000004 

mm 



iiPcMT 

SOFKRS= 104406 407| 
SOPPAS 000046R 37i| 

SRI 000016R 360f 594 

SR2 000020" 



III mm 



:01 CROSS REFERENCE TABLE — USER SYMBOLS SEQ 0027 

m m in m m m iih im dit m xm iiu 

"ejs 'k. mu 

810 818 849 854 862 
407t 



762 



896* 915 917* 918* 919 1050f 

mi "'^* 



START 000224R 366 409f 

STAT 000026R 365« 

STATR 003366R ||4 §l§ fjg §54 §7g (m 631 638 646 

STATX 003404R 44 

SYRO 000062R 38i 



i i 1 Ul i 



SYR3 000070R 383# 

Iyr| ooooill lail 

SYR6 000076R 3861 

YKCTOR OOOOIOR 356| 483 520 719 



OLB« DEC/Jril SYSTEM EIERCISBR MODULE NACTll 301IC1052) l2-OCT-'r8 16:28 PACE 30 
12-0CT-78 12:01 CROSS RBFBREMCE TRBLE — WSBR SYMBOLS 

S84* 960* 

nm 

821 826» 839 865 870« 883 899 912 1048f 

mm 88? 

IRORS OETECTEf): 
IFAULT 6L0BALS GgNSRATED: 




XDLBn0«XDLeB0/SQL/CRP:SyP«sD0ICOM,IDLBB0 
RUN" TIME: 23 mi SECONDS 
RUN-TIME RATIO: 31/6=4.9 
CORE USED; 7K (13 PACESI 



DIAGNOSTIC ENGINEERING 

DECOD DEPO^ SUBMISSION □ 

"product identification ^ 



for release eimg. use 
□ change Q delete 



' ' . - - 



LIBRARY 


PRODUCT NUMBER 


REV 


PATCH 


ECO 
TALLY 


ZZ 


CXDLB 


B 


1 





PRODUCT DATE 



DD MMM YY 



STATUS 



2Z I .1^n|79 M OBSOLETE P\g\ rTR 



DISTRIBUTION 



1ST COPY- 
RIGHT YEAR 


LAST COPY- 
RIGHT Vear 


■ ly/B 





^'^•-^ CXDLBB1 DL11-E M ODULE 

MAiNTAiE)iR€9^j6()pi SPT GRP I maintainerD.BUTENHOI'' Isubmitting S^ieiMfefeiiJiilMHUJ;' 



AUTHOR D.PUTENHOF 



PRODUCT COMPONENTS j 



CK 


DESCRIPTION 


PRODUCT NO. 


REV 


CK 


DESCRIPTION 


PRODUCT NO. 


REV 




DOCUMENT 








INDEX 








LISTING 








SOURCE MEDIA 






OBJECT MEDIA 








TEST MEDIA 






X 


DEPO 


AF-E99»B-M1 













































PRODUCTS OBSOLETED (other than previous version) | 




PROCESSORS PRODUCT OPERATES WITH (Enter all applicable 2 digit codes representing the Processor the product operates with. See separate instructions.) 



03 0^- 05 1C20 \2^ 3^ 35 ^0 if550 55 60 70 






OPERATIONAL CODES (Enter all applicable 2-digit codes that describe the product. See separate instructions.) 


02 


033^+ 06 50 





ACT/APT/XXDP 



INFORMATION FIELD 

:kaai ^ ||i p ifipif|M||^^ 

PROBLEM REPORTS CLOSED; 



EXT 



ACT 
SEQ r 



NUMBER £&^PA"'''BLE' 
f^Y I |n 



APT COMPATIBLE? 

EL 



SUBSEQUENT 
PAS^,F^N TIME 

SECONDS 



DECO/DEPO INFORMATION 



DEVICE AFFECTED DEC/X1 1 




'vlULTIMEDIA AFFECTED? EfYES D NoJ 



KIT NUMBERS 


ZJI29-RZ 


ZJI29-FR 


ZJI30-RB 

























PROBLEM: 

Module is intenteci for FRONT-END Interface only^ but documentation does 

not say so. 



SOLUTION: 



state in module header that this module is not intended for use on standalone 
PDF 11 SYSTEMS, 



DEPO PATCH AREA 



CHANGE LOG 



FROM 



TO 



CHANGE LOG 



FROM 



TO 




EER 



jFA CTUR ING ENGINEER 



SUPPORT ENGINEER 



CHARGE DECO/DEPO TO^- 
DISCRETE PROJECT NUMBER 



DATE: 



FIELD SERVICE 



WAIVERING MANAGER 



COORDINATION NO. 



DATE: 



DATE: 



